home *** CD-ROM | disk | FTP | other *** search
| Winamp Advanced Visualization Studio File | 2003-11-17 | 7.3 KB |
view JSON data
|
view as text
|
open on a Mac
|
open on a PC
This file was processed as: Winamp Advanced Visualization Studio File
(other/winampAdvVisStudioStyle).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Winamp Advanced Visualization Studio File (other/winampAdvVisStudioStyle)
| magic
| Unsupported |
| 1%
| dexvert
| AVSS Video (video/avssVideo)
| ext
| Unsupported |
| 100%
| file
| Winamp plug in
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Winamp Advanced Visualization Studio File
| default
| |
| 100%
| gt2
| Kopftext: 'Nullsoft AVS Preset 0.2'
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 4e 75 6c 6c 73 6f 66 74 | 20 41 56 53 20 50 72 65 |Nullsoft| AVS Pre|
|00000010| 73 65 74 20 30 2e 32 1a | 00 15 00 00 00 fd 02 00 |set 0.2.|........|
|00000020| 00 f9 02 00 00 20 57 68 | 61 63 6b 6f 20 41 56 53 |..... Wh|acko AVS|
|00000030| 20 56 49 20 2d 20 43 6f | 6e 74 61 69 6e 6d 65 6e | VI - Co|ntainmen|
|00000040| 74 0d 0a 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |t..-----|--------|
|00000050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000070| 2d 2d 2d 2d 0d 0a 0d 0a | 54 68 69 73 20 70 72 65 |----....|This pre|
|00000080| 73 65 74 20 73 74 61 72 | 74 65 64 20 6f 75 74 20 |set star|ted out |
|00000090| 61 73 20 61 20 57 61 72 | 70 2d 63 6f 72 65 20 6b |as a War|p-core k|
|000000a0| 69 6e 64 20 6f 66 20 70 | 72 65 73 65 74 2c 20 62 |ind of p|reset, b|
|000000b0| 75 74 20 6f 6e 63 65 20 | 49 20 73 61 77 20 74 68 |ut once |I saw th|
|000000c0| 61 74 20 69 74 20 6c 6f | 6f 6b 65 64 20 6d 6f 72 |at it lo|oked mor|
|000000d0| 65 20 6c 69 6b 65 20 61 | 20 63 61 6e 69 73 74 65 |e like a| caniste|
|000000e0| 72 20 6f 72 20 63 6f 6e | 74 61 69 6e 65 72 2c 20 |r or con|tainer, |
|000000f0| 49 20 63 68 61 6e 67 65 | 64 20 69 74 20 61 20 62 |I change|d it a b|
|00000100| 69 74 20 61 6e 64 20 61 | 64 64 65 64 20 73 6f 6d |it and a|dded som|
|00000110| 65 20 6d 6f 72 65 20 72 | 6f 74 61 74 69 6f 6e 73 |e more r|otations|
|00000120| 2e 0d 0a 0d 0a 54 68 65 | 20 63 79 6c 69 6e 64 65 |.....The| cylinde|
|00000130| 72 20 69 73 20 32 2d 73 | 69 64 65 64 20 61 6e 64 |r is 2-s|ided and|
|00000140| 20 74 68 75 73 20 63 6f | 6e 73 69 73 74 73 20 6f | thus co|nsists o|
|00000150| 66 20 32 20 44 4d 73 20 | 28 77 68 69 63 68 20 65 |f 2 DMs |(which e|
|00000160| 78 70 6c 61 69 6e 73 20 | 74 68 65 20 73 6c 6f 77 |xplains |the slow|
|00000170| 6e 65 73 73 20 6f 66 20 | 74 68 69 73 20 70 72 65 |ness of |this pre|
|00000180| 73 65 74 29 2e 20 49 20 | 6f 72 69 67 69 6e 61 6c |set). I |original|
|00000190| 6c 79 20 70 6c 61 6e 65 | 64 20 74 6f 20 6d 61 6b |ly plane|d to mak|
|000001a0| 65 20 74 68 65 20 63 6f | 6e 74 61 69 6e 65 72 27 |e the co|ntainer'|
|000001b0| 73 20 63 6f 6e 74 65 6e | 74 73 20 6d 6f 72 65 20 |s conten|ts more |
|000001c0| 69 6e 74 65 72 65 73 74 | 69 6e 67 2c 20 62 75 74 |interest|ing, but|
|000001d0| 20 69 74 20 77 6f 75 6c | 64 20 62 65 20 74 6f 6f | it woul|d be too|
|000001e0| 20 73 6c 6f 77 2e 0d 0a | 0d 0a 4e 6f 77 20 69 74 | slow...|..Now it|
|000001f0| 20 6c 6f 6f 6b 73 20 6c | 69 6b 65 20 69 74 27 73 | looks l|ike it's|
|00000200| 20 61 20 66 6f 72 63 65 | 66 69 65 6c 64 20 61 72 | a force|field ar|
|00000210| 6f 75 6e 64 20 73 6f 6d | 65 20 64 61 6e 67 65 72 |ound som|e danger|
|00000220| 6f 75 73 20 63 72 65 61 | 74 75 72 65 20 6f 72 20 |ous crea|ture or |
|00000230| 73 75 62 73 74 61 6e 63 | 65 2c 20 77 68 69 63 68 |substanc|e, which|
|00000240| 20 69 73 20 6e 65 61 74 | 20 74 6f 6f 2e 0d 0a 0d | is neat| too....|
|00000250| 0a 0d 0a 53 74 65 76 65 | 6e 20 57 69 74 74 65 6e |...Steve|n Witten|
|00000260| 73 20 2f 20 55 6e 43 6f | 6e 65 44 0d 0a 73 74 65 |s / UnCo|neD..ste|
|00000270| 76 65 6e 40 61 63 6b 6f | 2e 6e 65 74 20 2d 20 77 |ven@acko|.net - w|
|00000280| 77 77 2e 61 63 6b 6f 2e | 6e 65 74 0d 0a 0d 0a 28 |ww.acko.|net....(|
|00000290| 49 66 20 79 6f 75 20 77 | 69 73 68 20 74 6f 20 75 |If you w|ish to u|
|000002a0| 73 65 20 61 6e 79 20 70 | 61 72 74 20 6f 66 20 74 |se any p|art of t|
|000002b0| 68 69 73 20 70 72 65 73 | 65 74 20 69 6e 20 79 6f |his pres|et in yo|
|000002c0| 75 72 20 6f 77 6e 20 70 | 61 63 6b 73 20 79 6f 75 |ur own p|acks you|
|000002d0| 20 61 72 65 20 66 72 65 | 65 20 74 6f 20 64 6f 20 | are fre|e to do |
|000002e0| 73 6f 2c 20 6f 6e 20 74 | 68 65 20 63 6f 6e 64 69 |so, on t|he condi|
|000002f0| 74 69 6f 6e 20 74 68 61 | 74 20 79 6f 75 20 69 6e |tion tha|t you in|
|00000300| 63 6c 75 64 65 20 6d 79 | 20 63 6f 6e 74 61 63 74 |clude my| contact|
|00000310| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 29 00 fe ff | informa|tion)...|
|00000320| ff ff 75 03 00 00 80 00 | 00 00 24 80 00 00 00 80 |..u.....|..$.....|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 01 | 00 00 00 03 00 00 00 08 |........|........|
|00000350| 00 00 00 04 00 00 00 2f | 03 00 00 28 00 00 00 04 |......./|...(....|
|00000360| 00 00 00 01 00 03 80 06 | 00 00 00 04 00 00 00 02 |........|........|
|00000370| 00 00 00 24 00 00 00 ab | 00 00 00 01 64 00 00 00 |...$....|....d...|
|00000380| 79 3d 28 2d 74 2a 31 30 | 30 30 29 25 31 30 30 30 |y=(-t*10|00)%1000|
|00000390| 2a 2e 30 30 31 2a 32 2d | 31 3b 0d 0a 78 3d 69 2a |*.001*2-|1;..x=i*|
|000003a0| 32 2d 31 3b 0d 0a 72 65 | 64 3d 61 62 73 28 67 65 |2-1;..re|d=abs(ge|
|000003b0| 74 6f 73 63 28 69 2c 30 | 2c 30 29 2a 32 29 3b 67 |tosc(i,0|,0)*2);g|
|000003c0| 72 65 65 6e 3d 72 65 64 | 2a 63 67 3b 62 6c 75 65 |reen=red|*cg;blue|
|000003d0| 3d 72 65 64 2a 63 62 3b | 72 65 64 3d 72 65 64 2a |=red*cb;|red=red*|
|000003e0| 63 72 3b 00 22 00 00 00 | 74 3d 74 2d 30 2e 30 32 |cr;."...|t=t-0.02|
|000003f0| 3b 63 72 3d 72 65 64 3b | 63 67 3d 67 72 65 65 6e |;cr=red;|cg=green|
|00000400| 3b 63 62 3d 62 6c 75 65 | 3b 00 00 00 00 00 04 00 |;cb=blue|;.......|
|00000410| 00 00 6e 3d 32 00 02 00 | 00 00 01 00 00 00 33 f7 |..n=2...|......3.|
|00000420| 95 00 01 00 00 00 24 00 | 00 00 ac 00 00 00 01 64 |......$.|.......d|
|00000430| 00 00 00 79 3d 28 2d 74 | 2a 31 30 30 30 29 25 31 |...y=(-t|*1000)%1|
|00000440| 30 30 30 2a 2e 30 30 31 | 2a 32 2d 31 3b 0d 0a 78 |000*.001|*2-1;..x|
|00000450| 3d 69 2a 32 2d 31 3b 0d | 0a 72 65 64 3d 61 62 73 |=i*2-1;.|.red=abs|
|00000460| 28 67 65 74 6f 73 63 28 | 69 2c 30 2c 30 29 2a 32 |(getosc(|i,0,0)*2|
|00000470| 29 3b 67 72 65 65 6e 3d | 72 65 64 2a 63 67 3b 62 |);green=|red*cg;b|
|00000480| 6c 75 65 3d 72 65 64 2a | 63 62 3b 72 65 64 3d 72 |lue=red*|cb;red=r|
|00000490| 65 64 2a 63 72 3b 00 23 | 00 00 00 74 3d 74 2b 30 |ed*cr;.#|...t=t+0|
|000004a0| 2e 30 32 31 3b 63 72 3d | 72 65 64 3b 63 67 3d 67 |.021;cr=|red;cg=g|
|000004b0| 72 65 65 6e 3b 63 62 3d | 62 6c 75 65 3b 00 00 00 |reen;cb=|blue;...|
|000004c0| 00 00 04 00 00 00 6e 3d | 32 00 02 00 00 00 01 00 |......n=|2.......|
|000004d0| 00 00 31 3a f9 00 01 00 | 00 00 28 00 00 00 04 00 |..1:....|..(.....|
|000004e0| 00 00 01 66 01 80 24 00 | 00 00 c1 00 00 00 01 8e |...f..$.|........|
|000004f0| 00 00 00 6c 6c 3d 6c 70 | 3b 0d 0a 6c 70 3d 62 6e |...ll=lp|;..lp=bn|
|00000500| 6f 74 28 72 61 6e 64 28 | 31 30 29 29 3b 0d 0a 6c |ot(rand(|10));..l|
|00000510| 78 3d 69 66 28 62 61 6e | 64 28 6c 70 2c 62 6e 6f |x=if(ban|d(lp,bno|
|00000520| 74 28 6c 6c 29 29 2c 6c | 78 2b 72 61 6e 64 28 32 |t(ll)),l|x+rand(2|
|00000530| 29 2a 32 2d 31 2c 6c 78 | 29 3b 0d 0a 79 3d 69 2a |)*2-1,lx|);..y=i*|
|00000540| 32 2d 31 3b 78 3d 6c 78 | 2a 2e 30 35 2d 31 3b 0d |2-1;x=lx|*.05-1;.|
|00000550| 0a 72 65 64 3d 61 62 73 | 28 67 65 74 6f 73 63 28 |.red=abs|(getosc(|
|00000560| 69 2c 30 2c 30 29 2a 33 | 29 2b 2e 32 3b 67 72 65 |i,0,0)*3|)+.2;gre|
|00000570| 65 6e 3d 72 65 64 3b 62 | 6c 75 65 3d 72 65 64 3b |en=red;b|lue=red;|
|00000580| 00 0d 00 00 00 6c 78 3d | 72 61 6e 64 28 34 30 29 |.....lx=|rand(40)|
|00000590| 3b 00 00 00 00 00 05 00 | 00 00 6e 3d 33 30 00 02 |;.......|..n=30..|
|000005a0| 00 00 00 01 00 00 00 ff | ff ff 00 01 00 00 00 24 |........|.......$|
|000005b0| 00 00 00 d0 00 00 00 01 | 9d 00 00 00 6c 6c 3d 6c |........|....ll=l|
|000005c0| 70 3b 0d 0a 6c 70 3d 62 | 6e 6f 74 28 72 61 6e 64 |p;..lp=b|not(rand|
|000005d0| 28 31 30 29 29 3b 0d 0a | 6c 78 3d 69 66 28 62 61 |(10));..|lx=if(ba|
|000005e0| 6e 64 28 6c 70 2c 62 6e | 6f 74 28 6c 6c 29 29 2c |nd(lp,bn|ot(ll)),|
|000005f0| 6c 78 2b 72 61 6e 64 28 | 32 29 2a 32 2d 31 2c 6c |lx+rand(|2)*2-1,l|
|00000600| 78 29 3b 0d 0a 79 3d 69 | 2a 32 2d 31 3b 78 3d 6c |x);..y=i|*2-1;x=l|
|00000610| 78 2a 2e 30 35 2d 31 3b | 0d 0a 72 65 64 3d 61 62 |x*.05-1;|..red=ab|
|00000620| 73 28 67 65 74 6f 73 63 | 28 69 2c 30 2c 30 29 2a |s(getosc|(i,0,0)*|
|00000630| 33 29 2b 2e 32 3b 67 72 | 65 65 6e 3d 72 65 64 3b |3)+.2;gr|een=red;|
|00000640| 62 6c 75 65 3d 72 65 64 | 2a 2e 32 35 3b 72 65 64 |blue=red|*.25;red|
|00000650| 3d 72 65 64 2a 2e 32 35 | 00 0d 00 00 00 6c 78 3d |=red*.25|.....lx=|
|00000660| 72 61 6e 64 28 34 30 29 | 3b 00 00 00 00 00 05 00 |rand(40)|;.......|
|00000670| 00 00 6e 3d 33 30 00 02 | 00 00 00 01 00 00 00 ff |..n=30..|........|
|00000680| ff ff 00 01 00 00 00 12 | 00 00 00 0c 00 00 00 00 |........|........|
|00000690| 00 00 00 00 00 00 00 00 | 00 00 00 2c 00 00 00 04 |........|...,....|
|000006a0| 00 00 00 01 00 00 00 0f | 00 00 00 2b 00 00 00 ff |........|...+....|
|000006b0| 7f 00 00 01 0e 00 00 00 | 78 3d 72 2a 2e 33 31 38 |........|x=r*.318|
|000006c0| 3b 79 3d 64 3b 00 01 00 | 00 00 00 00 00 00 01 00 |;y=d;...|........|
|000006d0| 00 00 00 00 00 00 01 00 | 00 00 2b 00 00 00 44 03 |........|..+...D.|
|000006e0| 00 00 01 98 01 00 00 64 | 79 3d 79 2a 61 66 3b 0d |.......d|y=y*af;.|
|000006f0| 0a 64 78 31 3d 78 2a 63 | 7a 2d 64 79 2a 73 7a 3b |.dx1=x*c|z-dy*sz;|
|00000700| 0d 0a 64 79 31 3d 78 2a | 73 7a 2b 64 79 2a 63 7a |..dy1=x*|sz+dy*cz|
|00000710| 3b 0d 0a 64 79 32 3d 64 | 79 31 2a 63 78 2d 73 78 |;..dy2=d|y1*cx-sx|
|00000720| 3b 0d 0a 64 7a 32 3d 64 | 79 31 2a 73 78 2b 63 78 |;..dz2=d|y1*sx+cx|
|00000730| 3b 0d 0a 64 78 33 3d 64 | 78 31 2a 63 79 2d 64 7a |;..dx3=d|x1*cy-dz|
|00000740| 32 2a 73 79 3b 0d 0a 64 | 7a 32 3d 64 78 31 2a 73 |2*sy;..d|z2=dx1*s|
|00000750| 79 2b 64 7a 32 2a 63 79 | 3b 0d 0a 64 78 31 3d 73 |y+dz2*cy|;..dx1=s|
|00000760| 71 72 28 64 7a 32 29 2b | 73 71 72 28 64 78 33 29 |qr(dz2)+|sqr(dx3)|
|00000770| 3b 0d 0a 64 79 31 3d 2d | 32 2a 28 64 7a 32 2a 6f |;..dy1=-|2*(dz2*o|
|00000780| 7a 2b 64 78 33 2a 6f 78 | 29 3b 0d 0a 78 3d 73 71 |z+dx3*ox|);..x=sq|
|00000790| 72 28 64 79 31 29 2d 34 | 2a 64 78 31 2a 28 73 71 |r(dy1)-4|*dx1*(sq|
|000007a0| 72 28 6f 7a 29 2b 73 71 | 72 28 6f 78 29 2d 2e 31 |r(oz)+sq|r(ox)-.1|
|000007b0| 29 3b 0d 0a 61 6c 70 68 | 61 3d 61 62 6f 76 65 28 |);..alph|a=above(|
|000007c0| 78 2c 30 29 3b 0d 0a 6b | 3d 28 28 2d 64 79 31 2d |x,0);..k|=((-dy1-|
|000007d0| 73 71 72 74 28 78 29 29 | 2f 64 78 31 29 2a 2e 35 |sqrt(x))|/dx1)*.5|
|000007e0| 3b 0d 0a 61 6c 70 68 61 | 3d 69 66 28 61 6c 70 68 |;..alpha|=if(alph|
|000007f0| 61 2c 61 62 6f 76 65 28 | 6b 2c 30 29 2c 30 29 3b |a,above(|k,0),0);|
|00000800| 0d 0a 69 78 3d 2d 6f 78 | 2b 64 78 33 2a 6b 3b 69 |..ix=-ox|+dx3*k;i|
|00000810| 79 3d 2d 6f 79 2b 64 79 | 32 2a 6b 3b 69 7a 3d 2d |y=-oy+dy|2*k;iz=-|
|00000820| 6f 7a 2b 64 7a 32 2a 6b | 3b 0d 0a 78 3d 61 73 69 |oz+dz2*k|;..x=asi|
|00000830| 6e 28 73 69 6e 28 61 74 | 61 6e 32 28 69 7a 2c 69 |n(sin(at|an2(iz,i|
|00000840| 78 29 29 29 2a 2e 33 31 | 38 2a 31 2e 35 3b 79 3d |x)))*.31|8*1.5;y=|
|00000850| 69 79 2a 34 2d 31 3b 0d | 0a 61 6c 70 68 61 3d 61 |iy*4-1;.|.alpha=a|
|00000860| 6c 70 68 61 2a 6d 69 6e | 28 31 2c 37 2d 61 62 73 |lpha*min|(1,7-abs|
|00000870| 28 69 79 2b 2e 32 29 2a | 32 30 29 3b 0d 0a 00 70 |(iy+.2)*|20);...p|
|00000880| 01 00 00 74 69 3d 74 69 | 2a 2e 39 3b 74 3d 74 2b |...ti=ti|*.9;t=t+|
|00000890| 30 2e 30 32 2b 74 69 2a | 2e 31 3b 0d 0a 6f 78 3d |0.02+ti*|.1;..ox=|
|000008a0| 63 6f 73 28 74 29 2a 63 | 6f 73 28 74 2a 2e 33 37 |cos(t)*c|os(t*.37|
|000008b0| 39 2b 31 29 2a 63 6f 73 | 28 73 69 6e 28 74 2a 2e |9+1)*cos|(sin(t*.|
|000008c0| 31 34 31 29 29 3b 0d 0a | 6f 79 3d 2e 32 35 2b 73 |141));..|oy=.25+s|
|000008d0| 69 6e 28 74 2a 2e 39 31 | 29 2a 63 6f 73 28 2d 74 |in(t*.91|)*cos(-t|
|000008e0| 2a 2e 37 31 29 2a 2e 32 | 35 3b 0d 0a 6f 7a 3d 73 |*.71)*.2|5;..oz=s|
|000008f0| 69 6e 28 74 29 2a 63 6f | 73 28 2d 74 2a 2e 34 31 |in(t)*co|s(-t*.41|
|00000900| 29 2a 73 69 6e 28 63 6f | 73 28 74 2a 2e 36 33 31 |)*sin(co|s(t*.631|
|00000910| 29 29 3b 0d 0a 6f 74 3d | 2e 37 2b 2e 34 2f 73 71 |));..ot=|.7+.4/sq|
|00000920| 72 74 28 73 71 72 28 6f | 78 29 2b 73 71 72 28 6f |rt(sqr(o|x)+sqr(o|
|00000930| 7a 29 29 3b 0d 0a 6f 78 | 3d 6f 78 2a 6f 74 3b 6f |z));..ox|=ox*ot;o|
|00000940| 7a 3d 6f 7a 2a 6f 74 3b | 0d 0a 72 7a 3d 73 69 6e |z=oz*ot;|..rz=sin|
|00000950| 28 74 2a 2e 31 34 29 2a | 63 6f 73 28 74 2a 2e 34 |(t*.14)*|cos(t*.4|
|00000960| 37 31 29 2a 2e 35 3b 0d | 0a 72 79 3d 61 74 61 6e |71)*.5;.|.ry=atan|
|00000970| 32 28 2d 6f 78 2c 6f 7a | 29 3b 0d 0a 72 78 3d 2d |2(-ox,oz|);..rx=-|
|00000980| 61 74 61 6e 32 28 6f 79 | 2d 2e 32 2c 73 71 72 74 |atan2(oy|-.2,sqrt|
|00000990| 28 73 71 72 28 6f 78 29 | 2b 73 71 72 28 6f 7a 29 |(sqr(ox)|+sqr(oz)|
|000009a0| 29 29 3b 0d 0a 63 78 3d | 63 6f 73 28 72 78 29 3b |));..cx=|cos(rx);|
|000009b0| 73 78 3d 73 69 6e 28 72 | 78 29 3b 63 79 3d 63 6f |sx=sin(r|x);cy=co|
|000009c0| 73 28 72 79 29 3b 73 79 | 3d 73 69 6e 28 72 79 29 |s(ry);sy|=sin(ry)|
|000009d0| 3b 63 7a 3d 63 6f 73 28 | 72 7a 29 3b 73 7a 3d 73 |;cz=cos(|rz);sz=s|
|000009e0| 69 6e 28 72 7a 29 3b 0d | 0a 61 66 3d 68 2f 77 3b |in(rz);.|.af=h/w;|
|000009f0| 0d 0a 00 06 00 00 00 74 | 69 3d 31 3b 00 05 00 00 |.......t|i=1;....|
|00000a00| 00 74 3d 30 3b 00 00 00 | 00 00 01 00 00 00 19 00 |.t=0;...|........|
|00000a10| 00 00 07 00 00 00 01 00 | 00 00 01 00 00 00 01 00 |........|........|
|00000a20| 00 00 00 00 00 00 fe ff | ff ff 71 03 00 00 81 01 |........|..q.....|
|00000a30| 00 05 24 80 00 00 00 80 | 00 00 00 00 00 00 00 00 |..$.....|........|
|00000a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00000a50| 00 00 00 2b 00 00 00 44 | 03 00 00 01 98 01 00 00 |...+...D|........|
|00000a60| 64 79 3d 79 2a 61 66 3b | 0d 0a 64 78 31 3d 78 2a |dy=y*af;|..dx1=x*|
|00000a70| 63 7a 2d 64 79 2a 73 7a | 3b 0d 0a 64 79 31 3d 78 |cz-dy*sz|;..dy1=x|
|00000a80| 2a 73 7a 2b 64 79 2a 63 | 7a 3b 0d 0a 64 79 32 3d |*sz+dy*c|z;..dy2=|
|00000a90| 64 79 31 2a 63 78 2d 73 | 78 3b 0d 0a 64 7a 32 3d |dy1*cx-s|x;..dz2=|
|00000aa0| 64 79 31 2a 73 78 2b 63 | 78 3b 0d 0a 64 78 33 3d |dy1*sx+c|x;..dx3=|
|00000ab0| 64 78 31 2a 63 79 2d 64 | 7a 32 2a 73 79 3b 0d 0a |dx1*cy-d|z2*sy;..|
|00000ac0| 64 7a 32 3d 64 78 31 2a | 73 79 2b 64 7a 32 2a 63 |dz2=dx1*|sy+dz2*c|
|00000ad0| 79 3b 0d 0a 64 78 31 3d | 73 71 72 28 64 7a 32 29 |y;..dx1=|sqr(dz2)|
|00000ae0| 2b 73 71 72 28 64 78 33 | 29 3b 0d 0a 64 79 31 3d |+sqr(dx3|);..dy1=|
|00000af0| 2d 32 2a 28 64 7a 32 2a | 6f 7a 2b 64 78 33 2a 6f |-2*(dz2*|oz+dx3*o|
|00000b00| 78 29 3b 0d 0a 78 3d 73 | 71 72 28 64 79 31 29 2d |x);..x=s|qr(dy1)-|
|00000b10| 34 2a 64 78 31 2a 28 73 | 71 72 28 6f 7a 29 2b 73 |4*dx1*(s|qr(oz)+s|
|00000b20| 71 72 28 6f 78 29 2d 2e | 31 29 3b 0d 0a 61 6c 70 |qr(ox)-.|1);..alp|
|00000b30| 68 61 3d 61 62 6f 76 65 | 28 78 2c 30 29 3b 0d 0a |ha=above|(x,0);..|
|00000b40| 6b 3d 28 28 2d 64 79 31 | 2b 73 71 72 74 28 78 29 |k=((-dy1|+sqrt(x)|
|00000b50| 29 2f 64 78 31 29 2a 2e | 35 3b 0d 0a 61 6c 70 68 |)/dx1)*.|5;..alph|
|00000b60| 61 3d 69 66 28 61 6c 70 | 68 61 2c 61 62 6f 76 65 |a=if(alp|ha,above|
|00000b70| 28 6b 2c 30 29 2c 30 29 | 3b 0d 0a 69 78 3d 2d 6f |(k,0),0)|;..ix=-o|
|00000b80| 78 2b 64 78 33 2a 6b 3b | 69 79 3d 2d 6f 79 2b 64 |x+dx3*k;|iy=-oy+d|
|00000b90| 79 32 2a 6b 3b 69 7a 3d | 2d 6f 7a 2b 64 7a 32 2a |y2*k;iz=|-oz+dz2*|
|00000ba0| 6b 3b 0d 0a 78 3d 61 73 | 69 6e 28 73 69 6e 28 61 |k;..x=as|in(sin(a|
|00000bb0| 74 61 6e 32 28 69 7a 2c | 69 78 29 29 29 2a 2e 33 |tan2(iz,|ix)))*.3|
|00000bc0| 31 38 2a 31 2e 35 3b 79 | 3d 69 79 2a 34 2d 31 3b |18*1.5;y|=iy*4-1;|
|00000bd0| 0d 0a 61 6c 70 68 61 3d | 61 6c 70 68 61 2a 6d 69 |..alpha=|alpha*mi|
|00000be0| 6e 28 31 2c 37 2d 61 62 | 73 28 69 79 2b 2e 32 29 |n(1,7-ab|s(iy+.2)|
|00000bf0| 2a 32 30 29 3b 0d 0a 00 | 70 01 00 00 74 69 3d 74 |*20);...|p...ti=t|
|00000c00| 69 2a 2e 39 3b 74 3d 74 | 2b 30 2e 30 32 2b 74 69 |i*.9;t=t|+0.02+ti|
|00000c10| 2a 2e 31 3b 0d 0a 6f 78 | 3d 63 6f 73 28 74 29 2a |*.1;..ox|=cos(t)*|
|00000c20| 63 6f 73 28 74 2a 2e 33 | 37 39 2b 31 29 2a 63 6f |cos(t*.3|79+1)*co|
|00000c30| 73 28 73 69 6e 28 74 2a | 2e 31 34 31 29 29 3b 0d |s(sin(t*|.141));.|
|00000c40| 0a 6f 79 3d 2e 32 35 2b | 73 69 6e 28 74 2a 2e 39 |.oy=.25+|sin(t*.9|
|00000c50| 31 29 2a 63 6f 73 28 2d | 74 2a 2e 37 31 29 2a 2e |1)*cos(-|t*.71)*.|
|00000c60| 32 35 3b 0d 0a 6f 7a 3d | 73 69 6e 28 74 29 2a 63 |25;..oz=|sin(t)*c|
|00000c70| 6f 73 28 2d 74 2a 2e 34 | 31 29 2a 73 69 6e 28 63 |os(-t*.4|1)*sin(c|
|00000c80| 6f 73 28 74 2a 2e 36 33 | 31 29 29 3b 0d 0a 6f 74 |os(t*.63|1));..ot|
|00000c90| 3d 2e 37 2b 2e 34 2f 73 | 71 72 74 28 73 71 72 28 |=.7+.4/s|qrt(sqr(|
|00000ca0| 6f 78 29 2b 73 71 72 28 | 6f 7a 29 29 3b 0d 0a 6f |ox)+sqr(|oz));..o|
|00000cb0| 78 3d 6f 78 2a 6f 74 3b | 6f 7a 3d 6f 7a 2a 6f 74 |x=ox*ot;|oz=oz*ot|
|00000cc0| 3b 0d 0a 72 7a 3d 73 69 | 6e 28 74 2a 2e 31 34 29 |;..rz=si|n(t*.14)|
|00000cd0| 2a 63 6f 73 28 74 2a 2e | 34 37 31 29 2a 2e 35 3b |*cos(t*.|471)*.5;|
|00000ce0| 0d 0a 72 79 3d 61 74 61 | 6e 32 28 2d 6f 78 2c 6f |..ry=ata|n2(-ox,o|
|00000cf0| 7a 29 3b 0d 0a 72 78 3d | 2d 61 74 61 6e 32 28 6f |z);..rx=|-atan2(o|
|00000d00| 79 2d 2e 32 2c 73 71 72 | 74 28 73 71 72 28 6f 78 |y-.2,sqr|t(sqr(ox|
|00000d10| 29 2b 73 71 72 28 6f 7a | 29 29 29 3b 0d 0a 63 78 |)+sqr(oz|)));..cx|
|00000d20| 3d 63 6f 73 28 72 78 29 | 3b 73 78 3d 73 69 6e 28 |=cos(rx)|;sx=sin(|
|00000d30| 72 78 29 3b 63 79 3d 63 | 6f 73 28 72 79 29 3b 73 |rx);cy=c|os(ry);s|
|00000d40| 79 3d 73 69 6e 28 72 79 | 29 3b 63 7a 3d 63 6f 73 |y=sin(ry|);cz=cos|
|00000d50| 28 72 7a 29 3b 73 7a 3d | 73 69 6e 28 72 7a 29 3b |(rz);sz=|sin(rz);|
|00000d60| 0d 0a 61 66 3d 68 2f 77 | 3b 0d 0a 00 06 00 00 00 |..af=h/w|;.......|
|00000d70| 74 69 3d 31 3b 00 05 00 | 00 00 74 3d 30 3b 00 00 |ti=1;...|..t=0;..|
|00000d80| 00 00 00 01 00 00 00 19 | 00 00 00 07 00 00 00 01 |........|........|
|00000d90| 00 00 00 01 00 00 00 01 | 00 00 00 00 00 00 00 2c |........|.......,|
|00000da0| 00 00 00 04 00 00 00 00 | 00 00 00 28 00 00 00 04 |........|...(....|
|00000db0| 00 00 00 01 00 02 80 24 | 00 00 00 da 02 00 00 01 |.......$|........|
|00000dc0| 28 01 00 00 75 3d 69 2a | 74 70 69 3b 0d 0a 70 78 |(...u=i*|tpi;..px|
|00000dd0| 3d 63 6f 73 28 75 29 2a | 2e 33 31 3b 70 7a 3d 73 |=cos(u)*|.31;pz=s|
|00000de0| 69 6e 28 75 29 2a 2e 33 | 31 3b 70 79 3d 2d 2e 35 |in(u)*.3|1;py=-.5|
|00000df0| 37 35 3b 0d 0a 70 78 3d | 70 78 2b 6f 78 3b 70 79 |75;..px=|px+ox;py|
|00000e00| 3d 70 79 2b 6f 79 3b 70 | 7a 3d 70 7a 2b 6f 7a 3b |=py+oy;p|z=pz+oz;|
|00000e10| 0d 0a 78 31 3d 70 78 2a | 63 79 2d 70 7a 2a 73 79 |..x1=px*|cy-pz*sy|
|00000e20| 3b 7a 31 3d 70 78 2a 73 | 79 2b 70 7a 2a 63 79 3b |;z1=px*s|y+pz*cy;|
|00000e30| 0d 0a 79 32 3d 70 79 2a | 63 78 2d 7a 31 2a 73 78 |..y2=py*|cx-z1*sx|
|00000e40| 3b 7a 32 3d 70 79 2a 73 | 78 2b 7a 31 2a 63 78 3b |;z2=py*s|x+z1*cx;|
|00000e50| 0d 0a 78 33 3d 78 31 2a | 63 7a 2d 79 32 2a 73 7a |..x3=x1*|cz-y2*sz|
|00000e60| 3b 79 33 3d 78 31 2a 73 | 7a 2b 79 32 2a 63 7a 3b |;y3=x1*s|z+y2*cz;|
|00000e70| 0d 0a 64 74 3d 69 66 28 | 61 62 6f 76 65 28 7a 32 |..dt=if(|above(z2|
|00000e80| 2c 2e 30 31 29 2c 31 2f | 7a 32 2c 30 29 3b 0d 0a |,.01),1/|z2,0);..|
|00000e90| 78 3d 69 66 28 64 74 2c | 78 33 2a 64 74 2c 78 29 |x=if(dt,|x3*dt,x)|
|00000ea0| 3b 79 3d 69 66 28 64 74 | 2c 79 33 2a 64 74 2a 61 |;y=if(dt|,y3*dt*a|
|00000eb0| 66 2c 79 29 3b 0d 0a 64 | 74 3d 64 74 2a 30 2e 36 |f,y);..d|t=dt*0.6|
|00000ec0| 3b 0d 0a 72 65 64 3d 28 | 64 74 2d 2e 35 29 2a 28 |;..red=(|dt-.5)*(|
|00000ed0| 31 2d 69 70 29 3b 67 72 | 65 65 6e 3d 72 65 64 3b |1-ip);gr|een=red;|
|00000ee0| 62 6c 75 65 3d 72 65 64 | 3b 0d 0a 00 63 01 00 00 |blue=red|;...c...|
|00000ef0| 74 69 3d 74 69 2a 2e 39 | 3b 74 3d 74 2b 30 2e 30 |ti=ti*.9|;t=t+0.0|
|00000f00| 32 2b 74 69 2a 2e 31 3b | 6f 78 3d 63 6f 73 28 74 |2+ti*.1;|ox=cos(t|
|00000f10| 29 2a 63 6f 73 28 74 2a | 2e 33 37 39 2b 31 29 2a |)*cos(t*|.379+1)*|
|00000f20| 63 6f 73 28 73 69 6e 28 | 74 2a 2e 31 34 31 29 29 |cos(sin(|t*.141))|
|00000f30| 3b 6f 79 3d 2e 32 35 2b | 73 69 6e 28 74 2a 2e 39 |;oy=.25+|sin(t*.9|
|00000f40| 31 29 2a 63 6f 73 28 2d | 74 2a 2e 37 31 29 2a 2e |1)*cos(-|t*.71)*.|
|00000f50| 32 35 3b 6f 7a 3d 73 69 | 6e 28 74 29 2a 63 6f 73 |25;oz=si|n(t)*cos|
|00000f60| 28 2d 74 2a 2e 34 31 29 | 2a 73 69 6e 28 63 6f 73 |(-t*.41)|*sin(cos|
|00000f70| 28 74 2a 2e 36 33 31 29 | 29 3b 6f 74 3d 2e 37 2b |(t*.631)|);ot=.7+|
|00000f80| 2e 34 2f 73 71 72 74 28 | 73 71 72 28 6f 78 29 2b |.4/sqrt(|sqr(ox)+|
|00000f90| 73 71 72 28 6f 7a 29 29 | 3b 6f 78 3d 6f 78 2a 6f |sqr(oz))|;ox=ox*o|
|00000fa0| 74 3b 6f 7a 3d 6f 7a 2a | 6f 74 3b 72 7a 3d 2d 73 |t;oz=oz*|ot;rz=-s|
|00000fb0| 69 6e 28 74 2a 2e 31 34 | 29 2a 63 6f 73 28 74 2a |in(t*.14|)*cos(t*|
|00000fc0| 2e 34 37 31 29 2a 2e 35 | 3b 72 79 3d 2d 61 74 61 |.471)*.5|;ry=-ata|
|00000fd0| 6e 32 28 2d 6f 78 2c 6f | 7a 29 3b 72 78 3d 61 74 |n2(-ox,o|z);rx=at|
|00000fe0| 61 6e 32 28 6f 79 2d 2e | 32 2c 73 71 72 74 28 73 |an2(oy-.|2,sqrt(s|
|00000ff0| 71 72 28 6f 78 29 2b 73 | 71 72 28 6f 7a 29 29 29 |qr(ox)+s|qr(oz)))|
|00001000| 3b 63 78 3d 63 6f 73 28 | 72 78 29 3b 73 78 3d 73 |;cx=cos(|rx);sx=s|
|00001010| 69 6e 28 72 78 29 3b 63 | 79 3d 63 6f 73 28 72 79 |in(rx);c|y=cos(ry|
|00001020| 29 3b 73 79 3d 73 69 6e | 28 72 79 29 3b 63 7a 3d |);sy=sin|(ry);cz=|
|00001030| 63 6f 73 28 72 7a 29 3b | 73 7a 3d 73 69 6e 28 72 |cos(rz);|sz=sin(r|
|00001040| 7a 29 3b 78 3d 30 3b 79 | 3d 30 3b 61 66 3d 77 2f |z);x=0;y|=0;af=w/|
|00001050| 68 3b 00 06 00 00 00 74 | 69 3d 31 3b 00 28 00 00 |h;.....t|i=1;.(..|
|00001060| 00 6e 3d 31 35 3b 74 70 | 69 3d 61 63 6f 73 28 2d |.n=15;tp|i=acos(-|
|00001070| 31 29 2a 32 3b 6d 66 3d | 31 30 30 3b 6d 74 3d 30 |1)*2;mf=|100;mt=0|
|00001080| 3b a3 20 52 69 6e 67 3b | 00 02 00 00 00 01 00 00 |;. Ring;|........|
|00001090| 00 ff ff ff 00 01 00 00 | 00 24 00 00 00 d8 02 00 |........|.$......|
|000010a0| 00 01 26 01 00 00 75 3d | 69 2a 74 70 69 3b 0d 0a |..&...u=|i*tpi;..|
|000010b0| 70 78 3d 63 6f 73 28 75 | 29 2a 2e 33 33 3b 70 7a |px=cos(u|)*.33;pz|
|000010c0| 3d 73 69 6e 28 75 29 2a | 2e 33 33 3b 70 79 3d 2d |=sin(u)*|.33;py=-|
|000010d0| 2e 36 3b 0d 0a 70 78 3d | 70 78 2b 6f 78 3b 70 79 |.6;..px=|px+ox;py|
|000010e0| 3d 70 79 2b 6f 79 3b 70 | 7a 3d 70 7a 2b 6f 7a 3b |=py+oy;p|z=pz+oz;|
|000010f0| 0d 0a 78 31 3d 70 78 2a | 63 79 2d 70 7a 2a 73 79 |..x1=px*|cy-pz*sy|
|00001100| 3b 7a 31 3d 70 78 2a 73 | 79 2b 70 7a 2a 63 79 3b |;z1=px*s|y+pz*cy;|
|00001110| 0d 0a 79 32 3d 70 79 2a | 63 78 2d 7a 31 2a 73 78 |..y2=py*|cx-z1*sx|
|00001120| 3b 7a 32 3d 70 79 2a 73 | 78 2b 7a 31 2a 63 78 3b |;z2=py*s|x+z1*cx;|
|00001130| 0d 0a 78 33 3d 78 31 2a | 63 7a 2d 79 32 2a 73 7a |..x3=x1*|cz-y2*sz|
|00001140| 3b 79 33 3d 78 31 2a 73 | 7a 2b 79 32 2a 63 7a 3b |;y3=x1*s|z+y2*cz;|
|00001150| 0d 0a 64 74 3d 69 66 28 | 61 62 6f 76 65 28 7a 32 |..dt=if(|above(z2|
|00001160| 2c 2e 30 31 29 2c 31 2f | 7a 32 2c 30 29 3b 0d 0a |,.01),1/|z2,0);..|
|00001170| 78 3d 69 66 28 64 74 2c | 78 33 2a 64 74 2c 78 29 |x=if(dt,|x3*dt,x)|
|00001180| 3b 79 3d 69 66 28 64 74 | 2c 79 33 2a 64 74 2a 61 |;y=if(dt|,y3*dt*a|
|00001190| 66 2c 79 29 3b 0d 0a 64 | 74 3d 64 74 2a 30 2e 36 |f,y);..d|t=dt*0.6|
|000011a0| 3b 0d 0a 72 65 64 3d 28 | 64 74 2d 2e 35 29 2a 28 |;..red=(|dt-.5)*(|
|000011b0| 31 2d 69 70 29 3b 67 72 | 65 65 6e 3d 72 65 64 3b |1-ip);gr|een=red;|
|000011c0| 62 6c 75 65 3d 72 65 64 | 3b 0d 0a 00 63 01 00 00 |blue=red|;...c...|
|000011d0| 74 69 3d 74 69 2a 2e 39 | 3b 74 3d 74 2b 30 2e 30 |ti=ti*.9|;t=t+0.0|
|000011e0| 32 2b 74 69 2a 2e 31 3b | 6f 78 3d 63 6f 73 28 74 |2+ti*.1;|ox=cos(t|
|000011f0| 29 2a 63 6f 73 28 74 2a | 2e 33 37 39 2b 31 29 2a |)*cos(t*|.379+1)*|
|00001200| 63 6f 73 28 73 69 6e 28 | 74 2a 2e 31 34 31 29 29 |cos(sin(|t*.141))|
|00001210| 3b 6f 79 3d 2e 32 35 2b | 73 69 6e 28 74 2a 2e 39 |;oy=.25+|sin(t*.9|
|00001220| 31 29 2a 63 6f 73 28 2d | 74 2a 2e 37 31 29 2a 2e |1)*cos(-|t*.71)*.|
|00001230| 32 35 3b 6f 7a 3d 73 69 | 6e 28 74 29 2a 63 6f 73 |25;oz=si|n(t)*cos|
|00001240| 28 2d 74 2a 2e 34 31 29 | 2a 73 69 6e 28 63 6f 73 |(-t*.41)|*sin(cos|
|00001250| 28 74 2a 2e 36 33 31 29 | 29 3b 6f 74 3d 2e 37 2b |(t*.631)|);ot=.7+|
|00001260| 2e 34 2f 73 71 72 74 28 | 73 71 72 28 6f 78 29 2b |.4/sqrt(|sqr(ox)+|
|00001270| 73 71 72 28 6f 7a 29 29 | 3b 6f 78 3d 6f 78 2a 6f |sqr(oz))|;ox=ox*o|
|00001280| 74 3b 6f 7a 3d 6f 7a 2a | 6f 74 3b 72 7a 3d 2d 73 |t;oz=oz*|ot;rz=-s|
|00001290| 69 6e 28 74 2a 2e 31 34 | 29 2a 63 6f 73 28 74 2a |in(t*.14|)*cos(t*|
|000012a0| 2e 34 37 31 29 2a 2e 35 | 3b 72 79 3d 2d 61 74 61 |.471)*.5|;ry=-ata|
|000012b0| 6e 32 28 2d 6f 78 2c 6f | 7a 29 3b 72 78 3d 61 74 |n2(-ox,o|z);rx=at|
|000012c0| 61 6e 32 28 6f 79 2d 2e | 32 2c 73 71 72 74 28 73 |an2(oy-.|2,sqrt(s|
|000012d0| 71 72 28 6f 78 29 2b 73 | 71 72 28 6f 7a 29 29 29 |qr(ox)+s|qr(oz)))|
|000012e0| 3b 63 78 3d 63 6f 73 28 | 72 78 29 3b 73 78 3d 73 |;cx=cos(|rx);sx=s|
|000012f0| 69 6e 28 72 78 29 3b 63 | 79 3d 63 6f 73 28 72 79 |in(rx);c|y=cos(ry|
|00001300| 29 3b 73 79 3d 73 69 6e | 28 72 79 29 3b 63 7a 3d |);sy=sin|(ry);cz=|
|00001310| 63 6f 73 28 72 7a 29 3b | 73 7a 3d 73 69 6e 28 72 |cos(rz);|sz=sin(r|
|00001320| 7a 29 3b 78 3d 30 3b 79 | 3d 30 3b 61 66 3d 77 2f |z);x=0;y|=0;af=w/|
|00001330| 68 3b 00 06 00 00 00 74 | 69 3d 31 3b 00 28 00 00 |h;.....t|i=1;.(..|
|00001340| 00 6e 3d 31 35 3b 74 70 | 69 3d 61 63 6f 73 28 2d |.n=15;tp|i=acos(-|
|00001350| 31 29 2a 32 3b 6d 66 3d | 31 30 30 3b 6d 74 3d 30 |1)*2;mf=|100;mt=0|
|00001360| 3b a3 20 52 69 6e 67 3b | 00 02 00 00 00 01 00 00 |;. Ring;|........|
|00001370| 00 ff ff ff 00 01 00 00 | 00 24 00 00 00 d9 02 00 |........|.$......|
|00001380| 00 01 27 01 00 00 75 3d | 69 2a 74 70 69 3b 0d 0a |..'...u=|i*tpi;..|
|00001390| 70 78 3d 63 6f 73 28 75 | 29 2a 2e 33 31 3b 70 7a |px=cos(u|)*.31;pz|
|000013a0| 3d 73 69 6e 28 75 29 2a | 2e 33 31 3b 70 79 3d 2e |=sin(u)*|.31;py=.|
|000013b0| 31 37 35 3b 0d 0a 70 78 | 3d 70 78 2b 6f 78 3b 70 |175;..px|=px+ox;p|
|000013c0| 79 3d 70 79 2b 6f 79 3b | 70 7a 3d 70 7a 2b 6f 7a |y=py+oy;|pz=pz+oz|
|000013d0| 3b 0d 0a 78 31 3d 70 78 | 2a 63 79 2d 70 7a 2a 73 |;..x1=px|*cy-pz*s|
|000013e0| 79 3b 7a 31 3d 70 78 2a | 73 79 2b 70 7a 2a 63 79 |y;z1=px*|sy+pz*cy|
|000013f0| 3b 0d 0a 79 32 3d 70 79 | 2a 63 78 2d 7a 31 2a 73 |;..y2=py|*cx-z1*s|
|00001400| 78 3b 7a 32 3d 70 79 2a | 73 78 2b 7a 31 2a 63 78 |x;z2=py*|sx+z1*cx|
|00001410| 3b 0d 0a 78 33 3d 78 31 | 2a 63 7a 2d 79 32 2a 73 |;..x3=x1|*cz-y2*s|
|00001420| 7a 3b 79 33 3d 78 31 2a | 73 7a 2b 79 32 2a 63 7a |z;y3=x1*|sz+y2*cz|
|00001430| 3b 0d 0a 64 74 3d 69 66 | 28 61 62 6f 76 65 28 7a |;..dt=if|(above(z|
|00001440| 32 2c 2e 30 31 29 2c 31 | 2f 7a 32 2c 30 29 3b 0d |2,.01),1|/z2,0);.|
|00001450| 0a 78 3d 69 66 28 64 74 | 2c 78 33 2a 64 74 2c 78 |.x=if(dt|,x3*dt,x|
|00001460| 29 3b 79 3d 69 66 28 64 | 74 2c 79 33 2a 64 74 2a |);y=if(d|t,y3*dt*|
|00001470| 61 66 2c 79 29 3b 0d 0a | 64 74 3d 64 74 2a 30 2e |af,y);..|dt=dt*0.|
|00001480| 36 3b 0d 0a 72 65 64 3d | 28 64 74 2d 2e 35 29 2a |6;..red=|(dt-.5)*|
|00001490| 28 31 2d 69 70 29 3b 67 | 72 65 65 6e 3d 72 65 64 |(1-ip);g|reen=red|
|000014a0| 3b 62 6c 75 65 3d 72 65 | 64 3b 0d 0a 00 63 01 00 |;blue=re|d;...c..|
|000014b0| 00 74 69 3d 74 69 2a 2e | 39 3b 74 3d 74 2b 30 2e |.ti=ti*.|9;t=t+0.|
|000014c0| 30 32 2b 74 69 2a 2e 31 | 3b 6f 78 3d 63 6f 73 28 |02+ti*.1|;ox=cos(|
|000014d0| 74 29 2a 63 6f 73 28 74 | 2a 2e 33 37 39 2b 31 29 |t)*cos(t|*.379+1)|
|000014e0| 2a 63 6f 73 28 73 69 6e | 28 74 2a 2e 31 34 31 29 |*cos(sin|(t*.141)|
|000014f0| 29 3b 6f 79 3d 2e 32 35 | 2b 73 69 6e 28 74 2a 2e |);oy=.25|+sin(t*.|
|00001500| 39 31 29 2a 63 6f 73 28 | 2d 74 2a 2e 37 31 29 2a |91)*cos(|-t*.71)*|
|00001510| 2e 32 35 3b 6f 7a 3d 73 | 69 6e 28 74 29 2a 63 6f |.25;oz=s|in(t)*co|
|00001520| 73 28 2d 74 2a 2e 34 31 | 29 2a 73 69 6e 28 63 6f |s(-t*.41|)*sin(co|
|00001530| 73 28 74 2a 2e 36 33 31 | 29 29 3b 6f 74 3d 2e 37 |s(t*.631|));ot=.7|
|00001540| 2b 2e 34 2f 73 71 72 74 | 28 73 71 72 28 6f 78 29 |+.4/sqrt|(sqr(ox)|
|00001550| 2b 73 71 72 28 6f 7a 29 | 29 3b 6f 78 3d 6f 78 2a |+sqr(oz)|);ox=ox*|
|00001560| 6f 74 3b 6f 7a 3d 6f 7a | 2a 6f 74 3b 72 7a 3d 2d |ot;oz=oz|*ot;rz=-|
|00001570| 73 69 6e 28 74 2a 2e 31 | 34 29 2a 63 6f 73 28 74 |sin(t*.1|4)*cos(t|
|00001580| 2a 2e 34 37 31 29 2a 2e | 35 3b 72 79 3d 2d 61 74 |*.471)*.|5;ry=-at|
|00001590| 61 6e 32 28 2d 6f 78 2c | 6f 7a 29 3b 72 78 3d 61 |an2(-ox,|oz);rx=a|
|000015a0| 74 61 6e 32 28 6f 79 2d | 2e 32 2c 73 71 72 74 28 |tan2(oy-|.2,sqrt(|
|000015b0| 73 71 72 28 6f 78 29 2b | 73 71 72 28 6f 7a 29 29 |sqr(ox)+|sqr(oz))|
|000015c0| 29 3b 63 78 3d 63 6f 73 | 28 72 78 29 3b 73 78 3d |);cx=cos|(rx);sx=|
|000015d0| 73 69 6e 28 72 78 29 3b | 63 79 3d 63 6f 73 28 72 |sin(rx);|cy=cos(r|
|000015e0| 79 29 3b 73 79 3d 73 69 | 6e 28 72 79 29 3b 63 7a |y);sy=si|n(ry);cz|
|000015f0| 3d 63 6f 73 28 72 7a 29 | 3b 73 7a 3d 73 69 6e 28 |=cos(rz)|;sz=sin(|
|00001600| 72 7a 29 3b 78 3d 30 3b | 79 3d 30 3b 61 66 3d 77 |rz);x=0;|y=0;af=w|
|00001610| 2f 68 3b 00 06 00 00 00 | 74 69 3d 31 3b 00 28 00 |/h;.....|ti=1;.(.|
|00001620| 00 00 6e 3d 31 35 3b 74 | 70 69 3d 61 63 6f 73 28 |..n=15;t|pi=acos(|
|00001630| 2d 31 29 2a 32 3b 6d 66 | 3d 31 30 30 3b 6d 74 3d |-1)*2;mf|=100;mt=|
|00001640| 30 3b a3 20 52 69 6e 67 | 3b 00 02 00 00 00 01 00 |0;. Ring|;.......|
|00001650| 00 00 ff ff ff 00 01 00 | 00 00 24 00 00 00 d7 02 |........|..$.....|
|00001660| 00 00 01 25 01 00 00 75 | 3d 69 2a 74 70 69 3b 0d |...%...u|=i*tpi;.|
|00001670| 0a 70 78 3d 63 6f 73 28 | 75 29 2a 2e 33 33 3b 70 |.px=cos(|u)*.33;p|
|00001680| 7a 3d 73 69 6e 28 75 29 | 2a 2e 33 33 3b 70 79 3d |z=sin(u)|*.33;py=|
|00001690| 2e 32 3b 0d 0a 70 78 3d | 70 78 2b 6f 78 3b 70 79 |.2;..px=|px+ox;py|
|000016a0| 3d 70 79 2b 6f 79 3b 70 | 7a 3d 70 7a 2b 6f 7a 3b |=py+oy;p|z=pz+oz;|
|000016b0| 0d 0a 78 31 3d 70 78 2a | 63 79 2d 70 7a 2a 73 79 |..x1=px*|cy-pz*sy|
|000016c0| 3b 7a 31 3d 70 78 2a 73 | 79 2b 70 7a 2a 63 79 3b |;z1=px*s|y+pz*cy;|
|000016d0| 0d 0a 79 32 3d 70 79 2a | 63 78 2d 7a 31 2a 73 78 |..y2=py*|cx-z1*sx|
|000016e0| 3b 7a 32 3d 70 79 2a 73 | 78 2b 7a 31 2a 63 78 3b |;z2=py*s|x+z1*cx;|
|000016f0| 0d 0a 78 33 3d 78 31 2a | 63 7a 2d 79 32 2a 73 7a |..x3=x1*|cz-y2*sz|
|00001700| 3b 79 33 3d 78 31 2a 73 | 7a 2b 79 32 2a 63 7a 3b |;y3=x1*s|z+y2*cz;|
|00001710| 0d 0a 64 74 3d 69 66 28 | 61 62 6f 76 65 28 7a 32 |..dt=if(|above(z2|
|00001720| 2c 2e 30 31 29 2c 31 2f | 7a 32 2c 30 29 3b 0d 0a |,.01),1/|z2,0);..|
|00001730| 78 3d 69 66 28 64 74 2c | 78 33 2a 64 74 2c 78 29 |x=if(dt,|x3*dt,x)|
|00001740| 3b 79 3d 69 66 28 64 74 | 2c 79 33 2a 64 74 2a 61 |;y=if(dt|,y3*dt*a|
|00001750| 66 2c 79 29 3b 0d 0a 64 | 74 3d 64 74 2a 30 2e 36 |f,y);..d|t=dt*0.6|
|00001760| 3b 0d 0a 72 65 64 3d 28 | 64 74 2d 2e 35 29 2a 28 |;..red=(|dt-.5)*(|
|00001770| 31 2d 69 70 29 3b 67 72 | 65 65 6e 3d 72 65 64 3b |1-ip);gr|een=red;|
|00001780| 62 6c 75 65 3d 72 65 64 | 3b 0d 0a 00 63 01 00 00 |blue=red|;...c...|
|00001790| 74 69 3d 74 69 2a 2e 39 | 3b 74 3d 74 2b 30 2e 30 |ti=ti*.9|;t=t+0.0|
|000017a0| 32 2b 74 69 2a 2e 31 3b | 6f 78 3d 63 6f 73 28 74 |2+ti*.1;|ox=cos(t|
|000017b0| 29 2a 63 6f 73 28 74 2a | 2e 33 37 39 2b 31 29 2a |)*cos(t*|.379+1)*|
|000017c0| 63 6f 73 28 73 69 6e 28 | 74 2a 2e 31 34 31 29 29 |cos(sin(|t*.141))|
|000017d0| 3b 6f 79 3d 2e 32 35 2b | 73 69 6e 28 74 2a 2e 39 |;oy=.25+|sin(t*.9|
|000017e0| 31 29 2a 63 6f 73 28 2d | 74 2a 2e 37 31 29 2a 2e |1)*cos(-|t*.71)*.|
|000017f0| 32 35 3b 6f 7a 3d 73 69 | 6e 28 74 29 2a 63 6f 73 |25;oz=si|n(t)*cos|
|00001800| 28 2d 74 2a 2e 34 31 29 | 2a 73 69 6e 28 63 6f 73 |(-t*.41)|*sin(cos|
|00001810| 28 74 2a 2e 36 33 31 29 | 29 3b 6f 74 3d 2e 37 2b |(t*.631)|);ot=.7+|
|00001820| 2e 34 2f 73 71 72 74 28 | 73 71 72 28 6f 78 29 2b |.4/sqrt(|sqr(ox)+|
|00001830| 73 71 72 28 6f 7a 29 29 | 3b 6f 78 3d 6f 78 2a 6f |sqr(oz))|;ox=ox*o|
|00001840| 74 3b 6f 7a 3d 6f 7a 2a | 6f 74 3b 72 7a 3d 2d 73 |t;oz=oz*|ot;rz=-s|
|00001850| 69 6e 28 74 2a 2e 31 34 | 29 2a 63 6f 73 28 74 2a |in(t*.14|)*cos(t*|
|00001860| 2e 34 37 31 29 2a 2e 35 | 3b 72 79 3d 2d 61 74 61 |.471)*.5|;ry=-ata|
|00001870| 6e 32 28 2d 6f 78 2c 6f | 7a 29 3b 72 78 3d 61 74 |n2(-ox,o|z);rx=at|
|00001880| 61 6e 32 28 6f 79 2d 2e | 32 2c 73 71 72 74 28 73 |an2(oy-.|2,sqrt(s|
|00001890| 71 72 28 6f 78 29 2b 73 | 71 72 28 6f 7a 29 29 29 |qr(ox)+s|qr(oz)))|
|000018a0| 3b 63 78 3d 63 6f 73 28 | 72 78 29 3b 73 78 3d 73 |;cx=cos(|rx);sx=s|
|000018b0| 69 6e 28 72 78 29 3b 63 | 79 3d 63 6f 73 28 72 79 |in(rx);c|y=cos(ry|
|000018c0| 29 3b 73 79 3d 73 69 6e | 28 72 79 29 3b 63 7a 3d |);sy=sin|(ry);cz=|
|000018d0| 63 6f 73 28 72 7a 29 3b | 73 7a 3d 73 69 6e 28 72 |cos(rz);|sz=sin(r|
|000018e0| 7a 29 3b 78 3d 30 3b 79 | 3d 30 3b 61 66 3d 77 2f |z);x=0;y|=0;af=w/|
|000018f0| 68 3b 00 06 00 00 00 74 | 69 3d 31 3b 00 28 00 00 |h;.....t|i=1;.(..|
|00001900| 00 6e 3d 31 35 3b 74 70 | 69 3d 61 63 6f 73 28 2d |.n=15;tp|i=acos(-|
|00001910| 31 29 2a 32 3b 6d 66 3d | 31 30 30 3b 6d 74 3d 30 |1)*2;mf=|100;mt=0|
|00001920| 3b a3 20 52 69 6e 67 3b | 00 02 00 00 00 01 00 00 |;. Ring;|........|
|00001930| 00 ff ff ff 00 01 00 00 | 00 28 00 00 00 04 00 00 |........|.(......|
|00001940| 00 01 00 01 80 24 00 00 | 00 f4 03 00 00 01 cc 01 |.....$..|........|
|00001950| 00 00 69 70 3d 62 6e 6f | 74 28 69 70 29 3b 0d 0a |..ip=bno|t(ip);..|
|00001960| 75 3d 69 2a 74 70 69 2a | 32 30 3b 78 3d 75 2a 2e |u=i*tpi*|20;x=u*.|
|00001970| 30 33 3b 0d 0a 70 78 3d | 63 6f 73 28 75 29 2a 73 |03;..px=|cos(u)*s|
|00001980| 69 6e 28 78 29 3b 70 7a | 3d 73 69 6e 28 75 29 2a |in(x);pz|=sin(u)*|
|00001990| 73 69 6e 28 78 29 3b 70 | 79 3d 63 6f 73 28 78 29 |sin(x);p|y=cos(x)|
|000019a0| 3b 0d 0a 6a 3d 28 70 78 | 2a 31 30 2e 31 2b 70 79 |;..j=(px|*10.1+py|
|000019b0| 2a 31 31 2e 31 2b 70 7a | 2a 31 33 2e 31 29 2a 31 |*11.1+pz|*13.1)*1|
|000019c0| 30 30 25 31 30 30 2a 2e | 30 31 3b 0d 0a 79 3d 2e |00%100*.|01;..y=.|
|000019d0| 31 2b 61 62 73 28 67 65 | 74 6f 73 63 28 6a 2c 30 |1+abs(ge|tosc(j,0|
|000019e0| 2c 30 29 29 2a 2e 34 3b | 0d 0a 70 78 3d 70 78 2a |,0))*.4;|..px=px*|
|000019f0| 79 3b 70 79 3d 70 79 2a | 79 2d 2e 32 3b 70 7a 3d |y;py=py*|y-.2;pz=|
|00001a00| 70 7a 2a 79 3b 0d 0a 70 | 78 3d 70 78 2b 6f 78 3b |pz*y;..p|x=px+ox;|
|00001a10| 70 79 3d 70 79 2b 6f 79 | 3b 70 7a 3d 70 7a 2b 6f |py=py+oy|;pz=pz+o|
|00001a20| 7a 3b 0d 0a 78 31 3d 70 | 78 2a 63 79 2d 70 7a 2a |z;..x1=p|x*cy-pz*|
|00001a30| 73 79 3b 7a 31 3d 70 78 | 2a 73 79 2b 70 7a 2a 63 |sy;z1=px|*sy+pz*c|
|00001a40| 79 3b 0d 0a 79 32 3d 70 | 79 2a 63 78 2d 7a 31 2a |y;..y2=p|y*cx-z1*|
|00001a50| 73 78 3b 7a 32 3d 70 79 | 2a 73 78 2b 7a 31 2a 63 |sx;z2=py|*sx+z1*c|
|00001a60| 78 3b 0d 0a 78 33 3d 78 | 31 2a 63 7a 2d 79 32 2a |x;..x3=x|1*cz-y2*|
|00001a70| 73 7a 3b 79 33 3d 78 31 | 2a 73 7a 2b 79 32 2a 63 |sz;y3=x1|*sz+y2*c|
|00001a80| 7a 3b 0d 0a 64 74 3d 69 | 66 28 61 62 6f 76 65 28 |z;..dt=i|f(above(|
|00001a90| 7a 32 2c 2e 30 31 29 2c | 31 2f 7a 32 2c 30 29 3b |z2,.01),|1/z2,0);|
|00001aa0| 0d 0a 78 3d 69 66 28 64 | 74 2c 78 33 2a 64 74 2c |..x=if(d|t,x3*dt,|
|00001ab0| 78 29 3b 79 3d 69 66 28 | 64 74 2c 79 33 2a 64 74 |x);y=if(|dt,y3*dt|
|00001ac0| 2a 61 66 2c 79 29 3b 0d | 0a 64 74 3d 64 74 2a 30 |*af,y);.|.dt=dt*0|
|00001ad0| 2e 32 2b 73 71 72 28 74 | 69 29 2a 2e 33 2b 2e 31 |.2+sqr(t|i)*.3+.1|
|00001ae0| 3b 0d 0a 72 65 64 3d 64 | 74 2a 28 69 70 2a 2e 37 |;..red=d|t*(ip*.7|
|00001af0| 35 2b 2e 32 35 29 3b 67 | 72 65 65 6e 3d 72 65 64 |5+.25);g|reen=red|
|00001b00| 2a 63 67 3b 62 6c 75 65 | 3d 72 65 64 2a 63 62 3b |*cg;blue|=red*cb;|
|00001b10| 72 65 64 3d 72 65 64 2a | 63 72 3b 0d 0a 00 c6 01 |red=red*|cr;.....|
|00001b20| 00 00 74 69 3d 74 69 2a | 2e 39 3b 74 3d 74 2b 30 |..ti=ti*|.9;t=t+0|
|00001b30| 2e 30 32 2b 74 69 2a 2e | 31 3b 6f 78 3d 63 6f 73 |.02+ti*.|1;ox=cos|
|00001b40| 28 74 29 2a 63 6f 73 28 | 74 2a 2e 33 37 39 2b 31 |(t)*cos(|t*.379+1|
|00001b50| 29 2a 63 6f 73 28 73 69 | 6e 28 74 2a 2e 31 34 31 |)*cos(si|n(t*.141|
|00001b60| 29 29 3b 6f 79 3d 2e 32 | 35 2b 73 69 6e 28 74 2a |));oy=.2|5+sin(t*|
|00001b70| 2e 39 31 29 2a 63 6f 73 | 28 2d 74 2a 2e 37 31 29 |.91)*cos|(-t*.71)|
|00001b80| 2a 2e 32 35 3b 6f 7a 3d | 73 69 6e 28 74 29 2a 63 |*.25;oz=|sin(t)*c|
|00001b90| 6f 73 28 2d 74 2a 2e 34 | 31 29 2a 73 69 6e 28 63 |os(-t*.4|1)*sin(c|
|00001ba0| 6f 73 28 74 2a 2e 36 33 | 31 29 29 3b 6f 74 3d 2e |os(t*.63|1));ot=.|
|00001bb0| 37 2b 2e 34 2f 73 71 72 | 74 28 73 71 72 28 6f 78 |7+.4/sqr|t(sqr(ox|
|00001bc0| 29 2b 73 71 72 28 6f 7a | 29 29 3b 6f 78 3d 6f 78 |)+sqr(oz|));ox=ox|
|00001bd0| 2a 6f 74 3b 6f 7a 3d 6f | 7a 2a 6f 74 3b 72 7a 3d |*ot;oz=o|z*ot;rz=|
|00001be0| 2d 73 69 6e 28 74 2a 2e | 31 34 29 2a 63 6f 73 28 |-sin(t*.|14)*cos(|
|00001bf0| 74 2a 2e 34 37 31 29 2a | 2e 35 3b 72 79 3d 2d 61 |t*.471)*|.5;ry=-a|
|00001c00| 74 61 6e 32 28 2d 6f 78 | 2c 6f 7a 29 3b 72 78 3d |tan2(-ox|,oz);rx=|
|00001c10| 61 74 61 6e 32 28 6f 79 | 2d 2e 32 2c 73 71 72 74 |atan2(oy|-.2,sqrt|
|00001c20| 28 73 71 72 28 6f 78 29 | 2b 73 71 72 28 6f 7a 29 |(sqr(ox)|+sqr(oz)|
|00001c30| 29 29 3b 63 78 3d 63 6f | 73 28 72 78 29 3b 73 78 |));cx=co|s(rx);sx|
|00001c40| 3d 73 69 6e 28 72 78 29 | 3b 63 79 3d 63 6f 73 28 |=sin(rx)|;cy=cos(|
|00001c50| 72 79 29 3b 73 79 3d 73 | 69 6e 28 72 79 29 3b 63 |ry);sy=s|in(ry);c|
|00001c60| 7a 3d 63 6f 73 28 72 7a | 29 3b 73 7a 3d 73 69 6e |z=cos(rz|);sz=sin|
|00001c70| 28 72 7a 29 3b 78 3d 30 | 3b 79 3d 30 3b 61 66 3d |(rz);x=0|;y=0;af=|
|00001c80| 77 2f 68 3b 69 70 3d 30 | 3b 68 75 3d 68 75 2b 2e |w/h;ip=0|;hu=hu+.|
|00001c90| 30 31 3b 63 72 3d 6d 69 | 6e 28 31 2c 73 69 6e 28 |01;cr=mi|n(1,sin(|
|00001ca0| 68 75 29 2a 2e 35 2b 31 | 2e 32 29 3b 63 67 3d 6d |hu)*.5+1|.2);cg=m|
|00001cb0| 69 6e 28 31 2c 73 69 6e | 28 68 75 2b 32 2e 30 39 |in(1,sin|(hu+2.09|
|00001cc0| 29 2a 2e 35 2b 31 2e 32 | 29 3b 63 62 3d 6d 69 6e |)*.5+1.2|);cb=min|
|00001cd0| 28 31 2c 73 69 6e 28 68 | 75 2b 34 2e 31 38 29 2a |(1,sin(h|u+4.18)*|
|00001ce0| 2e 35 2b 31 2e 32 29 00 | 16 00 00 00 74 69 3d 31 |.5+1.2).|....ti=1|
|00001cf0| 3b 68 75 3d 72 61 6e 64 | 28 36 32 38 29 2a 2e 30 |;hu=rand|(628)*.0|
|00001d00| 31 00 2b 00 00 00 6e 3d | 34 30 30 3b 74 70 69 3d |1.+...n=|400;tpi=|
|00001d10| 61 63 6f 73 28 2d 31 29 | 2a 32 3b 6d 66 3d 31 30 |acos(-1)|*2;mf=10|
|00001d20| 30 3b 6d 74 3d 30 3b a3 | 20 53 70 68 65 72 65 3b |0;mt=0;.| Sphere;|
|00001d30| 00 02 00 00 00 01 00 00 | 00 ff ff ff 00 01 00 00 |........|........|
|00001d40| 00 | |. | |
+--------+-------------------------+-------------------------+--------+--------+
